home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 19 / CU Amiga Magazine's Super CD-ROM 19 (1998)(EMAP Images)(GB)[!][issue 1998-02].iso / CUCD / Utilities / BlacksEditor / Rexx / DeleteFile.bed < prev    next >
Text File  |  1997-11-25  |  314b  |  17 lines
  1. /*
  2. ** $VER: DeleteFile.bed 1.0 (17.04.96)
  3. **
  4. ** Simple script to delete a file, I really missed this option :)
  5. **
  6. ** Written by Gerbert Nuijen
  7. */
  8.  
  9. OPTIONS RESULTS
  10.  
  11. GetFilePath PATH
  12. fpath = RESULT
  13.  
  14. 'RequestFile TITLE="Delete File..." OKGADGET=Delete PATH=' || fpath
  15. ADDRESS COMMAND 'Delete ' || RESULT || ' QUIET'
  16.  
  17.